home *** CD-ROM | disk | FTP | other *** search
/ Aminet 1 (Walnut Creek) / Aminet - June 1993 [Walnut Creek].iso / aminet / util / misc / mousetest.lha / TestRMB.ASM < prev    next >
Assembly Source File  |  1992-12-17  |  202b  |  13 lines
  1. ;      TestRMB by Ed Mackey
  2.  
  3. ;      Returns WARN if RMB is pressed.
  4.  
  5.        moveq   #0,d0
  6.        move    $DFF016,d1
  7.        btst    #10,d1
  8.        bne     nope
  9.        moveq   #5,d0
  10. nope:  rts
  11.  
  12.        END
  13.